home *** CD-ROM | disk | FTP | other *** search
- //--- Dragon
-
-
-
- #include "colors.inc"
- #include "shapes.inc"
- #include "shapes2.inc"
- #include "textures.inc"
- #include "dragtex.inc"
- #include "Back.inc"
- #include "legs.inc"
- #include "wing.inc"
- #include "head.inc"
- #include "foot.inc"
- #include "worm.inc"
-
-
-
- camera {
- location <10 50 -145>
- direction <0 0 1.9>
- up <0 1 0>
- right <1.333 0 0>
- look_at <10 25 0>
- }
-
-
-
- object { light_source { <30 100 -300> color White }}
- object { light_source { <-330 150 -500> color Gold }}
- object { light_source { <2300 50 500> color Scarlet }}
-
-
-
- #declare GlassBall =
- object {
- sphere { <0 0 0> 10 }
- texture { Glass }
- }
-
-
- //----- Complete Dragon
- #declare Dragon =
- composite {
- composite { Back }
- object { Belly scale <1 1 .8> }
- composite { BLeg translate <0 0 -7> }
- composite { BLeg translate <0 0 7> }
- composite { FLeg translate <0 0 6> }
- composite { FLeg translate <0 0 -6> }
- composite { Wing rotate <-45 0 0> translate <14 22 -4> }
- composite { Wing rotate <45 0 0> translate <14 22 4> }
- composite { Head scale <.3 .3 .3> rotate <0 0 0> translate <45 38 0> }
- composite { Foot scale <.6 .6 .6> translate <-15 0 -7> }
- composite { Foot scale <.6 .6 .6> translate <-15 0 7> }
- composite { Foot scale <.7 .7 .7> translate <12 0 -7> }
- composite { Foot scale <.7 .7 .7> translate <12 0 7> }
-
- bounded_by {
- box { UnitBox scale <80 30 50> translate <-10 27 0> }
- }
- }
-
-
-
- object { GlassBall translate <40 10 20> rotate <0 45 0> }
- composite { Dragon rotate <0 45 0> }
-
-
- //--- Floor
- object {
- plane { <0 1 0> 0 }
- texture {
- checker
- color Gray20
- color Gray30
- ambient .3
- reflection .4
- scale <10 1 10>
- translate <0.1 0.11 0.3>
- rotate <0 30 0>
- }
- }
-
-
- fog { 5000 color Black }
-
- composite { Worm translate <60 -5 30> }
- composite { Worm scale <2 2 2> translate <200 -5 1000> }
- composite { Worm translate <60 -5 100> }
-
-
-
-
-
- ə